COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002			PROM PROG
C00015 ENDMK
C⊗;
;		PROM PROG
; ROM INTER VECTS
LOC 177774
	NMIVL:	NMIAL		;			1
	NMIVH:	NMIAH		;			1
	RSTVL:	RSTAL		;			1
	RSTVH:	RSTAH		;			1
	IRQVL:	IRQAL		;			1
	IRQVH:	IRQAH		;		       _1_
				;			6
; ROM RESTET
LOC 177400
		BRK		;			1

	RRST:	
		LDXIM	377	;FIX SP ??		2
		TXS		;			1

		LDAIM	IRAL	;FIX IRQV		2
		STAAB	IRQVL	;			3
		LDAIM	IRAH	;			2
		STAAB	IRQVH	;			3

		LDAIM	NMIAL	;FIX NMI		2
		STAAB	NMIVL	;			3
		LDAIM	NMIAH	;			2
		STAAB	NMIVH	;		      __3_
				;		       25
;  RESET I/O

; OCT DDT
	BRKIN:	PHA		;SAV REGS		1
		TXA		;			1
		PHA		;			1
		TYA		;			1
		PHA		;		       _1_
							5
	ODT:	JSR	INKBAL	;GET C.K.B. COMMAND	2
			INKBAH	;		       _1_
				;			3
; CONTINUE
	CONT:	
		PLA		;GET REGS		1
		TAY		;			1
		PLA		;			1
		TAX		;			1
		PHA		;			1
		RTI		;CONTINUE	       _1_
				;		      __6_
				;		       40